﻿Imports DTO
Imports System.Data.OleDb
Public Class HocKyDAO
#Region "Phan chức năng"
    'Lay bang hoc ky
    Public Function LayBang() As DataTable
        'tao ket noi
        Dim dt As New DataTable
        Dim cn As OleDbConnection = DataProvider.ConnectDB()
        Dim strSQL As String = "SELECT * FROM HOCKY"
        Dim da As OleDbDataAdapter = New OleDbDataAdapter(strSQL, cn)
        da.Fill(dt)
        cn.Close()
        Return dt
    End Function

#End Region
  
End Class
